Cho mảng sau :
Var Diem : array [ 1..40] of real ;
a, Viết câu lệnh nhập giá trị cho các phần tử.
b, Viết câu lệnh in giá trị cho các phần tử .
Giúp mk vs chiều nay mk thi cuối kì 2 rồi :((
Câu 1 : hãy viết các câu lệnh trong pascal thực hiện các yêu cầu sau
a) Khai báo mảng A gồm 50 phần tử thuộc kiểu dữ liệu số thực
b) Phần tử thứ năm của mảng A được gắn giá trị là 8
c) Viết câu lệnh lặp nhập giá trị cho 50 phần tử trong mảng A và in ra màn hình giá trị của 50 phần tử đã nhập
Câu 2: Viết chương trình tính tổng 10 số tự nhiên đầu tiên
Câu 3: Cho mảng A chứa các giá trị sau
A | 17 | 13 | 20 | 10 | 15 |
I | 3 | 7 | 5 | 6 | 7 |
a) Xác định các giá trị của A[2];A[4];A[7];A[9] là bao nhiêu
b) Cho các câu lệnh sau:
A[2]:= A[3] + A[5];
A[9]:= A[6] + A[7];
Dựa vào bảng trên hãy tính giá trị các phần tử A[2], A[9]
Giúp em với ạ chiều nay thi rồi huhu
Câu 1:
a) var a:array[1..50]of real;
b) a[5]:=8;
c) for i:=1 to 50 do
begin
write('A[',i,']='); readln(a[i]);
end;
for i:=1 to 50 do
write(a[i]:4);
Câu 2:
uses crt;
var s,i:integer;
begin
clrscr;
s:=0;
for i:=1 to 10 do
s:=s+i;
writeln(s);
readln;
end.
Khai báo biến mảng: A : array[1..7] of real;. Sử dụng câu lệnh For i:= 1 to 5 do readln(A[i]); để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?
A. 4;
B. 5;
C. 6;
D. 7.
Khai báo biến mảng: A : array[1..7] of real;. Sử dụng câu lệnh For i:= 1 to 5 do readln(A[i]); để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?
A. 4
B. 5
C. 6
D. 7
Khai báo biến mảng: A : array[1..7] of real ; . Sử dụng câu lệnh For i := 1 to 5 do readln(A[i]); để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?
A. 4
B. 5
C. 6
D. 7
Trình bày cú pháp khai báo biến mảng trong hệ xuân ANATOMY. Áp dụng:Viết câu lệnh khai báo biến mảng lưu điểm TB môn tin của 45 học sinh lớp 9A và viết câu lệnh nhập giá trị cho các phần tử tỏng mảng vừa khai báo GIÚP MIK VS MN MAI MIK THI RỒI
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
1.cho đoạn ct sau:
Tong:=30; while tong>10 do tong:=tong-2;
khi kết thúc vòng lặp giá trị của biến tổng là ao nhiêu
2. khai báo biến mảng: Var A:array[1..10] of real;
sử dụng câu lệnh For i:=1 to 5 do readln(a[i]); để gán giá trị cho các phần tử trong biến mảng A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?
Câu 2:
Ta sẽ nhập được 5 giá trị
Cho khai báo mảng như sau: Var a : array[0..30] of integer ;
Để in giá trị phần tử thứ 20 của mảng một chiều A ra màn hình ta viết:
A. Write(A[20]);
B. Write(A(20));
C. Readln(A[20]);
D. Write([20]);
Để in giá trị phần tử của mảng một chiều A ra màn hình ta sử dụng lệnh Write/ writeln. Để tham chiếu đến phần tử trong mảng sử dụng cú pháp <Tên mảng>[chỉ số];
Đáp án: A